home *** CD-ROM | disk | FTP | other *** search
/ Planet Source Code Jumbo …e CD Visual Basic 1 to 7 / 1_2002.ISO / Data / Zips / Dynamic We219266292001.psc / modTray.bas < prev    next >
Encoding:
BASIC Source File  |  2001-06-28  |  858 b   |  33 lines
  1. Attribute VB_Name = "modTray"
  2.  
  3. Declare Function Shell_NotifyIcon Lib "shell32.dll" Alias _
  4.     "Shell_NotifyIconA" (ByVal dwMessage As Long, lpData As _
  5.     NOTIFYICONDATA) As Long
  6.  
  7.  
  8. Public Type NOTIFYICONDATA
  9.     cbSize As Long
  10.     hwnd As Long
  11.     uID As Long
  12.     uFlags As Long
  13.     uCallbackMessage As Long
  14.     hIcon As Long
  15.     szTip As String * 64
  16.     End Type
  17.     Public Const NIM_ADD = &H0
  18.     Public Const NIM_MODIFY = &H1
  19.     Public Const NIM_DELETE = &H2
  20.     Public Const NIF_MESSAGE = &H1
  21.     Public Const NIF_ICON = &H2
  22.     Public Const NIF_TIP = &H4
  23.     'Make your own constant, e.g.:
  24.     Public Const NIF_DOALL = NIF_MESSAGE Or NIF_ICON Or NIF_TIP
  25.     Public Const WM_MOUSEMOVE = &H200
  26.     Public Const WM_LBUTTONDBLCLK = &H203
  27.     Public Const WM_LBUTTONDOWN = &H201
  28.     Public Const WM_RBUTTONDOWN = &H204
  29.  
  30.  
  31.  
  32.  
  33.